-- Written for Daggerfall Unity by Harbinger451
Quest: PROST012
DisplayName: Prostitute Yourself to a Noble
-- Message panels
QRC:

QuestorOffer:  [1000]
<ce>                         I'd gladly pay you for a
<ce>                    feel of that fine body of yours?
                                     <--->
<ce>                Can I hold your body tight against mine?
<ce>                          I'm willing to pay.
                                     <--->
<ce>                   If I said you had a beautiful body
<ce>                     would you hold it against me?
<ce>                           I'll give you gold.
                                     <--->
<ce>                   %oth, but you're a fine looking %ra.
<ce>            I'd pay good money for a chance at that sweet body!
                                     <--->
<ce>                  Would you like to partake in a little
<ce>                       slap and tickle with me?
<ce>                   I believe that's the expression?
<ce>                      I'll pay you for your time.

RefuseQuest:  [1001]
<ce>                Oh well, nothing ventured, nothing gained.
                                     <--->
<ce>                     %oth! I was only joking anyway.
<ce>                     As if I'd be interested in you!
                                     <--->
<ce>                     Ha, I was just messing with you.
<ce>               Do I look like someone who has to pay for it?
                                     <--->
<ce>                     What? you're turning me down?
<ce>                       Don't you know who I am?
                                     <--->
<ce>                  How dare you say no to me, peasant.
<ce>                   i should have you horsewhipped.

AcceptQuest:  [1002]
<ce>                  Ha, I knew it. You peasants are always
<ce>                         in need of some coin.
                                     <--->
<ce>                 How wonderful, I knew you'd be up for it.
                                     <--->
<ce>                  Oh, I'm so thrilled that you said yes?
<ce>                  I always wanted to try a bit of rough.
                                     <--->
<ce>                    Wait? What? You said yes? Huzzah!
                                     <--->
<ce>                      You said yes! How thrilling!

QuestFail:  [1003]
<ce>                I didn't have you pegged as a prude, %pcf.
<ce>                   Hope you change your mind sometime.
                                    <--->
<ce>                You didn't strike me as the shy type, %pcf.
<ce>             Oh well, if you change your mind. I'm right here.
                                    <--->
<ce>                    What? you're turning me down?
<ce>                      Don't you know who I am?
                                    <--->
<ce>               Ha, I was messing with you. Do I look like
<ce>                the sort of person who has to pay for it?
                                    <--->
<ce>                  How dare you turn me down, peasant.
<ce>                    i should have you horsewhipped.

QuestComplete:  [1004]
<ce>                   Thank you for the happy ending, %pcf.
<ce>                       It was worth every penny.
                                     <--->
<ce>                I usually last a lot longer than that, %pcf.
<ce>                      But you were such a good lover,
<ce>                         I couldn't contain myself.
                                     <--->
<ce>                 Well, it's certainly true that you get
<ce>                           what you pay for.
                                     <--->
<ce>                 Good job, %pcf. You earned every penny!
                                     <--->
<ce>                    %oth, that was money well spent!

RumorsPostsuccess:  [1007]
Some talented %ra has started selling their body for cold hard cash. Even the nobles are falling over themselves to get some.
<--->
_qgiver_ paid some hot young %ra to pleasure %g2. Scandalous, that's what that is.
<--->
Some good looking young %ra is raking it in apparently. Seducing the nobility of the land and relieving them of their gold.
<--->
Apparently, someone called %pcn is the proverbial good time had by all. Oh, wait. That's you. Well hello there, %pcf.

QuestorPostsuccess:  [1008]
My dear, %pcf. You were money well spent indeed.
<--->
I can't stop thinking about you, %pcf. I enjoyed you more than anyone else I've paid for.
<--->
Hey, %pcf, I've spread the word, Now all the nobles want their bit of rough.

QuestLogEntry:  [1010]
%qdt
_qgiver_ in __qgiver_ of ___qgiver_ 
wants to pay me for a good time.

Message:  1011
%qdt:
_qgiver_ in __qgiver_ of ___qgiver_ paid me
_reward_ gold pieces for a real good time.
Unfortunately, %g1 left me with an itch that's driving me mad.

Message:  1012
<ce>                      But enough of the talking.
<ce>                  I'll pay you _reward_ gold pieces
<ce>                   to get down and dirty with me.
                                     <--->
<ce>                   I have _reward_ coins for you, %pcf
<ce>                        Now take me, I'm yours.
                                     <--->
<ce>             Now, let's do something we can both be ashamed of.
<ce>                    I'll give you _reward_ gold pieces.
                                     <--->
<ce>                  I have _reward_ gold for you, %pcf
<ce>          Now service me like you've never serviced anyone before.
                                     <--->
<ce>              Now, let's get down to the business of pleasure.
<ce>                   I'll give you _reward_ gold pieces.

Message:  1013
<ce>                                 Wahoo!
<ce>                                  ...
<ce>                         Don't hold back, %pcf!
<ce>                        I want my money's worth.
<ce>                                  ...
<ce>                       Mmm, yes! Take me! Use me!
<ce>                  %oth! You really know where it's at.
<ce>                                  ...
<ce>                       Oh gods! Oh my! Yes! Yes!
<ce>                                  ...
<ce>                      Do it to me! Yeah, that's it!
<ce>                                  ...
<ce>                       That's the spot. Yes! YES!
<ce>                                  ...
<ce>                           Phwoar, %pcf! YES!
<ce>                                  ...
<ce>                          %oth, that was good.
                                     <--->
<ce>                     Tally ho! lets get to the chase.
<ce>                         Time is money, afterall.
<ce>                                  ...
<ce>                           Quick, Touch me.
<ce>                           Oh, that's good.
<ce>                                  ...
<ce>                      Caress me. Yeah, that's right.
<ce>                                  ...
<ce>                          There. Yes, there!
<ce>                                  ...
<ce>                           Kiss me! Love me!
<ce>                                  ...
<ce>                               Oooh! Aaah!
<ce>                                  ...
<ce>                                 %oth!
<ce>                     That was the bee's knees, %pcf!

Message:  1014
%qdt:
_qgiver_ in __qgiver_ of ___qgiver_ paid me
_reward_ gold pieces for a real good time.

Message:  1015
<ce>                     Tally ho! lets get to the chase.
<ce>                         Time is money, afterall.
<ce>                                  ...
<ce>                           Quick, Touch me.
<ce>                           Oh, that's good.
<ce>                                  ...
<ce>                               %oth! NO!
<ce>                       This isn't doing it for me!
<ce>                                  ...
<ce>                       You're doing it all wrong!
<ce>                    I'M NOT PAYING FOR THIS FIASCO!
<ce>                                  ...
<ce>                       WHAT DO YOU MEAN, "WHAT ABOUT
<ce>                              YOUR MONEY!"
<ce>                                  ...
<ce>                        ARE YOU THREATENING ME?!

Message:  1016
<ce> You ARE threatening me!
<ce> Well why didn't you say so.
<ce> Though it kills me to pay
<ce> for something I didn't get,
<ce> I'm not going to argue and
<ce> die in a fight about it.
<ce> Here's your money

Message:  1017
<ce> I'm not some whimpering simp
<ce> you know. You can't just threaten 
<ce> your way to a pay off, not
<ce> with me. I'll fight to the
<ce> death for what's mine!
<ce> 
<ce> Or at least my guards will.
<ce> Die you fool!
<ce> 
<ce> Guards! Guards!
<ce> (_qgiver_ scurries away in a
<ce> panic before you have time to react.)

Message:  1018
<ce> What?!
<ce> Your NOT threatening me?!
<ce> Oh! I'm sorry.
<ce> I got a little carried away there.
<ce> Well, I'm not paying you for services
<ce> not delivered, so to speak.
<ce> So, move along. I have nothing
<ce> further to say.


QBN:

Item _reward_ gold range 333 to 777

Person _qgiver_ group Questor

Foe _knight_ is Knight

Clock _lovewindow_ 05:00

-- Quest start-up:
    start timer _lovewindow_
    prompt 1012 yes _pcgame_ no _pcprude_ 
    log 1010 step 0 

variable _pcgame_

_lovewindow_ task:
    remove log step 0
    change repute with _qgiver_ by -5 
    end quest

_weak_ task:
	when attribute Personality is at least 0

_even_ task:
	when attribute Personality is at least 40

_strong_ task:
	when attribute Personality is at least 60

_verystrong_ task:
	when attribute Personality is at least 80

_worstchance_ task:
	when _weak_ and not _even_

_evenchance_ task:
	when _even_ and not _strong_

_goodchance_ task:
	when _strong_ and not _verystrong_

_bestchance_ task:
	when _verystrong_

_chance1_ task:
	when _pcgame_ and _worstchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex2_

_chance2_ task:
	when _pcgame_ and _evenchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_chance3_ task:
	when _pcgame_ and _goodchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_chance4_ task:
	when _pcgame_ and _bestchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_sex1_ task:
    pick one of _pcinfect1in3_ _pcclear_ _pcclear_

_pcinfect1in3_ task:
    pick one of _pcinfect1in9_ _pcclear_ _pcclear_

_pcinfect1in9_ task:
    pick one of _pcinfect1in27_ _pcclear_ _pcclear_

_pcinfect1in27_ task:
    pick one of _pox_ _pox_ _leprosy_ _plague_

_pox_ task:
    say 1013
    train pc Etiquette
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Witches'_Pox
    end quest

_leprosy_ task:
    say 1013
    train pc Etiquette
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Leprosy
    end quest

_plague_ task:
    say 1013
    train pc Etiquette
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Plague
    end quest

_pcclear_ task:
    say 1013
    train pc Etiquette
    give pc _reward_
    remove log step 0
    log 1014 step 1
    end quest

_pcprude_ task:
    say 1003
    remove log step 0
    end quest

_sex2_ task:
    prompt 1015 yes _yesviolence_ no _noviolence_

_yesviolence_ task:
    pick one of _nonviolent_ _nonviolent_ _violent_

_nonviolent_ task:
    say 1016
    get item _reward_
    change repute with _qgiver_ by -5
    remove log step 0
    end quest

_violent_ task:
    say 1017
    hide npc _qgiver_
    change repute with _qgiver_ by -5
    create foe _knight_ every 0 minutes 1 times with 100% success
    remove log step 0 
    end quest

_noviolence_ task:
    say 1018
    remove log step 0
    end quest
